home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / R-Shows / (c)sdg.d64 / hires.boot.c-64 (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  460b  |  15 lines
  1. 10 REM ** HIRES DEMO BOOT FROM DISK **
  2. 20 REM **                           **
  3. 30 REM **     DON WHITE             **
  4. 40 REM **     47 ARIEL COURT        **
  5. 50 REM **     NEPEAN, ONTARIO       **
  6. 60 REM **     613-829-2082          **
  7. 70 REM **                           **
  8. 80 REM *******************************
  9. 90 REM
  10. 100 PRINT"[147]LOAD"CHR$(34)"HIRES.D"CHR$(34)",8"
  11. 110 POKE 198,6:POKE 631,19:POKE 632,13
  12. 115 POKE 633,82:POKE 634,85:POKE 635,78:POKE 636,13
  13. 120 POKE 44,64:POKE 43,1:POKE 16*1024,0
  14. 130 :CLR:NEW
  15.